home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Pascal / Frameworks / DropShell Pascal / DropShell.r < prev    next >
Encoding:
Text File  |  1991-12-10  |  14.3 KB  |  489 lines  |  [TEXT/MPS ]
  1. /******************************************************************************
  2. **
  3. **  Project Name:    DropShell
  4. **     File Name:    DropShell.r
  5. **
  6. **   Description:    Resource definitions for DropShell
  7. **
  8. **                    Since this is a shell, there are a LOT of places where the
  9. **                    specifics of the dropbox (and it's name) need to be placed.   
  10. **                    Currently a set of question marks (???) are there.  Use Search 
  11. **                    & Replace to replace them with your specific functionality.
  12. **
  13. *******************************************************************************
  14. **                       A U T H O R   I D E N T I T Y
  15. *******************************************************************************
  16. **
  17. **    Initials    Name
  18. **    --------    -----------------------------------------------
  19. **    LDR            Leonard Rosenthol
  20. **
  21. *******************************************************************************
  22. **                      R E V I S I O N   H I S T O R Y
  23. *******************************************************************************
  24. **
  25. **      Date        Time    Author    Description
  26. **    --------    -----    ------    ---------------------------------------------
  27. **    12/10/91            LDR        Added an 'aete' for scripting support
  28. **                                    since it needs special #include, conditionaled it
  29. **    12/09/91            LDR        Added new Select File… menu item in File menu
  30. **                                    and associated help resources & comments
  31. **    11/24/91            LDR        Added some new comments about Balloon resources
  32. **                                Added new string for AEVT errors
  33. **    10/28/91            LDR        Officially renamed DropShell (from QuickShell)
  34. **                                And added some comments
  35. **    04/09/91    00:00    LDR        Original Version
  36. **
  37. ******************************************************************************/
  38. /* We must do this define in order to get some extra flags! */
  39. #define SystemSevenOrLater 1
  40. #include "Types.r"
  41. #include "SysTypes.r"
  42. #include "BalloonTypes.r"
  43.  
  44. /* comment the next line to NOT build the AETE */
  45. #define BuildAETE 1
  46. #ifdef BuildAETE
  47.     #include "AEUserTermTypes.r"
  48. #endif
  49.  
  50. /* First thing we need is the Finder Help Balloon */
  51. /* Change the ??? to whatever your dropbox does (or completely change it!) */
  52. resource 'hfdr' (-5696) {
  53.     HelpMgrVersion, 0, 0, 0,
  54.     {
  55.         HMStringItem {
  56.             "Drag any file onto this icon, and I will magically ???",
  57.         },
  58.     }
  59. };
  60.  
  61. /* Splash Screen Goes Here */
  62. /* 
  63.     This is displayed all the time the program is running, so you do NOT want
  64.     to give it a close box.  Apple's Blue HIG folks recommend having this so 
  65.     that users can easily see what is running.  It is recommended that you put
  66.     some about info, as well as simply instructions about using the product.
  67. */
  68. resource 'WIND' (128) { {79,171,104,470}, movableDBoxProc, 
  69.     visible, nogoAway, 0x0, "DropShell Splash Screen", centerMainScreen
  70. };
  71.  
  72.  
  73. resource 'PICT' (128, "Splash") {
  74.     972,
  75.     {0,0,25,299},
  76.     $"1101 A030 39A0 0082 0100 0A00 0000 0000"
  77.     $"1901 3099 0026 0000 0000 0019 0130 0000"
  78.     $"0000 0019 012B 0000 0000 0019 012B 0000"
  79.     $"000A 0000 0000 0019 012B 1602 FFFF C0FB"
  80.     $"0001 3FFC F800 0201 FFFE FB00 01FF E0FA"
  81.     $"001D 02FF FFC0 FB00 017F FEFD 0001 01FC"
  82.     $"FE00 0401 FFFF 01F8 FD00 01FF F8FA 0026"
  83.     $"FEFF 228F EFC3 FF80 00FF FEFF E007 8007"
  84.     $"FF1F FF00 01FF FF07 FE03 FC00 00FF FC3F"
  85.     $"FE7F 03F7 FFE0 2725 5FFF FF8F EFC7 FFC0"
  86.     $"00FF FEFF F00F C00F FF9F FF80 01FF FF1F"
  87.     $"FF87 FF00 00FF FE3F FF7F 03F7 FFE0 2725"
  88.     $"5FFD DF87 EFC7 FFC0 01FF FEFF F80F C01F"
  89.     $"FFDF FF80 00FE 7F9F FFC7 FF80 00FF FE3F"
  90.     $"FF7F 83E6 FFE0 2725 5FF0 9F03 EFCF FFC0"
  91.     $"01FC 6E7F FC1F C03F FFCF 9F80 00FC 63BF"
  92.     $"EFC7 FF80 00FF FF1F 3F3F 83E2 FF60 2725"
  93.     $"03F0 9F03 E7CF CDC0 00FC 4E7F FE1F E03E"
  94.     $"2BCF 0980 00F8 033F EFE7 FFC0 007E FF9E"
  95.     $"133F C3C2 FE00 2725 03F0 1F03 E78F C4C0"
  96.     $"00FC 467C BE3F E07C 2BEF 0180 00F8 007C"
  97.     $"6CE3 CFC0 007C CF9E 033F E3C0 9E00 2725"
  98.     $"03F0 1F03 E787 E4C0 007E 067C 1E3C F078"
  99.     $"02EF 8000 007C 0078 00F3 CDE0 007C 0F9F"
  100.     $"003F E3C0 1E00 2725 03E0 0F03 E787 F0C0"
  101.     $"003F 003C 1E7C 7078 0067 FE00 007F FC78"
  102.     $"00F3 C0E0 007C 0F8F FC3F E3C0 1C00 2725"
  103.     $"01E0 0E01 E783 F800 001F 803C 1E78 7870"
  104.     $"0027 FE00 007F FC70 0073 E0C0 007C 0F0F"
  105.     $"FC3F F3C0 1C00 2725 01E0 0F01 E7C1 FC00"
  106.     $"000F E01C 3EF0 3870 0003 C400 003E 1870"
  107.     $"0071 E0C0 003C 0F07 883C F3C0 1C00 2725"
  108.     $"01E0 0FFF E3C0 FE00 0007 F03C 7AF0 1C70"
  109.     $"0007 8400 003C 1870 0033 E180 007C 1E0F"
  110.     $"081E 7380 1C00 2725 01E0 0FFF C380 7F00"
  111.     $"0007 F83F F0FF FC30 0003 8400 007C 1030"
  112.     $"0033 E280 007C 7A07 081E 3B80 3C00 2725"
  113.     $"01E0 0F6B 8380 7F00 0003 781F D0FF FC38"
  114.     $"0003 8000 003C 0030 0021 FC40 003F F207"
  115.     $"001E 3F80 3C00 2725 01E0 0701 8384 2F80"
  116.     $"00C2 3C1E 50FF 7C18 0003 8000 003C 0018"
  117.     $"0061 FE00 003F F207 001E 1F80 3C00 2725"
  118.     $"01E0 0703 8306 0780 00E0 3C1C 00E0 1C1C"
  119.     $"00C1 8600 003C 001C 0061 8F00 0038 F003"
  120.     $"0C1E 0F80 3C00 2725 01E0 0601 8307 0780"
  121.     $"0070 3C18 00E0 1C1F 0381 FC00 001C 000F"
  122.     $"01A1 8F00 0038 7803 F816 0380 0C00 2725"
  123.     $"01E0 0401 8303 8F00 0078 7818 00E0 0C0F"
  124.     $"FF01 FC00 001E 000F FF21 8380 0018 7803"
  125.     $"F816 0300 0C00 2725 00E0 0601 8101 FE00"
  126.     $"003F F018 00E0 0809 F901 E400 001E 0009"
  127.     $"FF01 C080 0018 7C03 C806 0300 1800 2719"
  128.     $"00E0 0401 8100 F800 001F E010 00C0 0800"
  129.     $"F000 8000 000E 0000 7C01 FE00 081C 0C01"
  130.     $"0006 0000 1000 2410 00C0 0000 8000 5000"
  131.     $"000F C010 0040 0800 60FD 0004 0E00 0018"
  132.     $"01FE 0004 1C06 0000 02FD 0016 0100 C0FD"
  133.     $"0004 4000 0005 80F7 0000 0CFA 0001 1804"
  134.     $"FA00 1401 0080 FD00 0340 0000 04F6 0000"
  135.     $"04FA 0000 10F9 0006 F800 0004 E500 A000"
  136.     $"83FF"
  137. };
  138.  
  139.  
  140.  
  141.  
  142. /* Menus & Menu Help Resources Go Here */
  143. /* You will probably want to put the application name here! */
  144. resource 'MENU' (128, "Apple") { 128, textMenuProc, 0x7FFFFFFD, enabled, apple, 
  145.     {    /* array: 2 elements */
  146.         /* [1] */    "About ???…", noIcon, noKey, noMark, plain,
  147.         /* [2] */    "-", noIcon, noKey, noMark, plain
  148.     }
  149. };
  150.  
  151. /* You'll probably want to replace Select File with something particular about your app */
  152. resource 'MENU' (129, "File") { 129, textMenuProc, allEnabled, enabled, "File", 
  153.     {    /* array: 2 elements */
  154.         /* [1] */    "Select File…",    noIcon, "O", noMark, plain,
  155.         /* [2] */    "Quit",         noIcon, "Q", noMark, plain
  156.     }
  157. };
  158.  
  159. /* 
  160.     These are the help resources for the menus.  You should not need to change
  161.     these unless you add or delete menu items.  If you wish to change the text
  162.     that is displayed, see the STR# with the same ID
  163. */
  164. resource 'hmnu' (128, purgeable) {    /* Apple */
  165.     HelpMgrVersion, 0, 0, 0,
  166.     HMSkipItem {    /* no missing items */    },
  167.     {    /* array HMenuArray: 2 elements */
  168.         HMSkipItem        {    /* skip the menu title */ },
  169.         HMStringResItem {    /* About Item */
  170.             128, 1,
  171.             128, 1,
  172.             0, 0,
  173.             0, 0
  174.         }
  175.     }
  176. };
  177.  
  178. resource 'hmnu' (129, purgeable) {    /* File */
  179.     HelpMgrVersion, 0, 0, 0,
  180.     HMSkipItem {    /* no missing items */    },
  181.     {    /* array HMenuArray: 4 elements */
  182.         HMStringResItem {    /* Menu Title */
  183.             129, 1,
  184.             129, 2,
  185.             129, 3,
  186.             129, 4
  187.         },
  188.         HMStringResItem {    /* Open File… */
  189.             129, 5,
  190.             129, 6,
  191.             0, 0,
  192.             0, 0
  193.         },
  194.         HMStringResItem {    /* Quit */
  195.             129, 7,
  196.             129, 8,
  197.             0, 0,
  198.             0, 0
  199.         },
  200.     }
  201. };
  202.  
  203. /* How about the About box? */
  204. /* Of course, you will modify this for your application */
  205. resource 'ALRT' (128, purgeable) { {75, 79, 198, 354}, 128,
  206.     {    /* array: 4 elements */
  207.         /* [1] */    OK, visible, silent,
  208.         /* [2] */    OK, visible, silent,
  209.         /* [3] */    OK, visible, silent,
  210.         /* [4] */    OK, visible, silent
  211.     },
  212.     alertPositionMainScreen
  213. };
  214.  
  215. resource 'DITL' (128, purgeable) {
  216.     {    /* array DITLarray: 3 elements */
  217.         /* [1] */ {97, 198, 117, 270}, Button { enabled, "OK" }, 
  218.         /* [2] */ {8, 8, 87, 271}, StaticText { disabled,
  219.             "DropShell - the simplest program possible with the DS Technology!" },
  220.         /* [3] */ {0, 0, 0, 0}, HelpItem { disabled, HMScanhdlg { 1 } } 
  221.     }
  222. };
  223.  
  224. /* 
  225.     This is the help resource for the about box.  Assuming you change
  226.     the contents of the about box, you will NEED to change this resource.
  227.     I suggest that you consult the Help Manager chapter of IM VI for
  228.     an explanation of how these resources work.
  229. */
  230. resource 'hdlg' (128, purgeable) {
  231.     HelpMgrVersion, 0, hmSaveBitsNoWindow, 0, 3,    /* need bits saved in Alert, since the OK ring & icons are not updated */
  232.     HMSkipItem    { /* no missing items */ },
  233.     {
  234.         HMStringResItem {    /* OK button */
  235.             {0,0},        /* default tip */
  236.             {0,0,0,0},    /* alternate rect */
  237.             128, 2,        /* res ID's as normal */
  238.             0, 0,
  239.             0, 0,
  240.             0, 0
  241.         },
  242.         HMStringResItem {    /* StatText */
  243.             {0,0},        /* default tip */
  244.             {0,0,0,0},    /* alternate rect */
  245.             0, 0,        
  246.             128, 3,        /* stat text is disabled! */
  247.             0, 0,
  248.             0, 0
  249.         }
  250.     }
  251. };
  252.  
  253. /* Here are the STR#'s that the Help text is stored in! */
  254. resource 'STR#' (128,purgeable) {    /* help items for Apple Menu */
  255.     { /* array StringArray: 3 elements */
  256.         /* [1] */     "Everything you always wanted to know about ???, but were afraid to ask",
  257.         /* [2] */     "Click here to dismiss this informative dialog.",
  258.         /* [3] */     "This text describes the product, its author, and why!"
  259.     }
  260. };
  261.  
  262. resource 'STR#' (129,purgeable) {    /* help items for File Menu */
  263.     { /* array StringArray: ? elements */
  264.         /* [1] */    "Use this menu to select a file and to exit the program.",
  265.         /* [2] */     "Use this menu to select a file and to exit the program. "
  266.                       "This menu is unavailable now.",
  267.         /* [3] */     "Use this menu to select a file and to exit the program. "
  268.                     "This menu is unavailable until you respond to the alert box or dialog box.",
  269.         /* [4] */     "This command is unavailable until you respond to the alert box or dialog box.",
  270.         /* [5] */     "Use this command to select a file.",
  271.         /* [6] */     "Use this command to select a file. "
  272.                     "Not available for some strange reason.",
  273.         /* [7] */     "Use this command to exit the program.",
  274.         /* [8] */     "Use this command to exit the program. "
  275.                     "Not available for some strange reason."
  276.     }
  277. };
  278.  
  279. /* Error Alert Stuff */
  280. resource 'ALRT' (200, purgeable) {
  281.     {100, 120, 224, 452}, 200,
  282.     {    /* array: 4 elements */
  283.         /* [1] */    OK, visible, silent,
  284.         /* [2] */    OK, visible, silent,
  285.         /* [3] */    OK, visible, silent,
  286.         /* [4] */    OK, visible, silent
  287.     },
  288.     alertPositionMainScreen
  289. };
  290.  
  291. resource 'DITL' (200, purgeable) {
  292.     {    /* array DITLarray: 4 elements */
  293.         /* [1] */    {92, 246, 112, 318}, Button { enabled, "OK" }, 
  294.         /* [2] */     {11, 73, 75, 318}, StaticText { disabled, "^0" }, 
  295.         /* [3] */     {11, 11, 43, 43}, Icon { disabled, 0 }, 
  296.         /* [4] */     {96, 11, 112, 100}, StaticText { disabled, "Error #^1" } 
  297.     }
  298. };
  299.  
  300. /* 
  301.     This is the help resource for the ErrorAlert above.  
  302.     You should not need to change this.
  303. */
  304. resource 'hdlg' (200, purgeable) {
  305.     HelpMgrVersion, 0, hmSaveBitsNoWindow, 0, 3,    /* need bits saved in Alert, since the OK ring & icons are not updated */
  306.     HMSkipItem    { /* no missing items */ },
  307.     {
  308.         HMStringResItem {    /* OK button */
  309.             {0,0},        /* default tip */
  310.             {0,0,0,0},    /* alternate rect */
  311.             200, 1,        /* res ID's as normal */
  312.             0, 0,
  313.             0, 0,
  314.             0, 0
  315.         },
  316.         HMStringResItem {    /* StatText - error message*/
  317.             {0,0},        /* default tip */
  318.             {0,0,0,0},    /* alternate rect */
  319.             0, 0,        
  320.             200, 2,        /* stat text is disabled! */
  321.             0, 0,
  322.             0, 0
  323.         },
  324.         HMSkipItem        {    /* icon */ },
  325.         HMStringResItem {    /* StatText - error ID*/
  326.             {0,0},        /* default tip */
  327.             {0,0,0,0},    /* alternate rect */
  328.             0, 0,        
  329.             200, 3,        /* stat text is disabled! */
  330.             0, 0,
  331.             0, 0
  332.         },
  333.     }
  334. };
  335.  
  336. resource 'STR#' (100) {    /* error alert messages! */
  337.     {    /* array StringArray: 1 elements */
  338.         /* [1] */    "This application requires Apple events.  Please upgrade to System 7.0 or later to use.",
  339.         /* [2] */    "An error occured during Apple event processing."
  340.     }
  341. };
  342.  
  343. resource 'STR#' (200, purgeable) {    /* help info for the Error Dialog */
  344.     {    /* array StringArray: 3 elements */
  345.         /* [1] */    "Click here to dismiss this informative dialog.",
  346.         /* [2] */    "This text describes the error that occured.",
  347.         /* [3] */    "This error ID gives more specific details of the error."
  348.     }
  349. };
  350.  
  351. resource 'vers' (1) {
  352.     0x01,    /* major revision */
  353.     0x00,    /* minor revision */
  354.     release,
  355.     0x00,    /* non-final release version */
  356.     verUS,    /* country code */
  357.     "1.0",    /* short vers string */
  358.     "Version 1.0"
  359. };
  360.  
  361. resource 'SIZE' (-1) {
  362.     reserved,
  363.     acceptSuspendResumeEvents,
  364.     reserved,
  365.     canBackground,
  366.     multiFinderAware,
  367.     backgroundAndForeground,
  368.     dontGetFrontClicks,
  369.     ignoreChildDiedEvents,
  370.     is32BitCompatible,
  371.     isHighLevelEventAware,
  372.     localAndRemoteHLEvents,
  373.     notStationeryAware,
  374.     dontUseTextEditServices,
  375.     reserved,
  376.     reserved,
  377.     reserved,
  378.     102400,
  379.     102400
  380. };
  381.  
  382. resource 'SIZE' (0) {
  383.     reserved,
  384.     acceptSuspendResumeEvents,
  385.     reserved,
  386.     canBackground,
  387.     multiFinderAware,
  388.     backgroundAndForeground,
  389.     dontGetFrontClicks,
  390.     ignoreChildDiedEvents,
  391.     is32BitCompatible,
  392.     isHighLevelEventAware,
  393.     localAndRemoteHLEvents,
  394.     notStationeryAware,
  395.     dontUseTextEditServices,
  396.     reserved,
  397.     reserved,
  398.     reserved,
  399.     102400,
  400.     102400
  401. };
  402.  
  403. resource 'FREF' (128) { 'APPL', 0, "" }; 
  404. resource 'FREF' (129) { '****', 1, "" }; 
  405.  
  406. /*     if you plan to support folders & disks then uncomment the next two lines 
  407.     and add the appropriate lines to the BNDL as well!
  408.  
  409.     resource 'FREF' (130) { 'fold', 2, "" }; 
  410.     resource 'FREF' (131) { 'disk', 3, "" }; 
  411. */
  412.  
  413. /* Don't forget to give yourself a REAL creator type! */
  414. /* Then modify the BNDL & the next resource for the old vers string */
  415. resource 'BNDL' (128, "Bundle") {
  416.     '????',
  417.     0,
  418.     {    /* array TypeArray: 2 elements */
  419.         /* [1] */
  420.         'FREF',
  421.         {    /* array IDArray: 2 elements */
  422.             /* [1] */ 0, 128,
  423.             /* [2] */ 1, 129
  424.         },
  425.         /* [2] */
  426.         'ICN#',
  427.         {    /* array IDArray: 2 elements */
  428.             /* [1] */ 0, 128,
  429.             /* [2] */ 1, 0
  430.         }
  431.     }
  432. };
  433.  
  434. data '????' (0) {
  435.     ""
  436. };
  437.  
  438.  
  439. #ifdef BuildAETE
  440.  
  441. /*
  442.     This is the KEY resource in supporting AEVTs - it is used by scripting/macro
  443.     systems such as Control Tower & QuicKeys in determing what events an application
  444.     supports.
  445.     
  446.     In this one, we simply tell it we support the required events, since that is all
  447.     we do.  If you add additional events, you MUST consult the AETE documentation
  448.     distributed by Apple.  Make sure you find the RELEASE NOTES, since this resource
  449.     has undergone a NUMBER of chanes.
  450. */
  451. resource 'aete' (0, "Apple Events Terminology") {
  452.  
  453.     0x00,            /* major version number in BCD */
  454.     0x90,            /* minor version number in BCD. From 7/9/91 version of AEUT docs */
  455.     english,        /* descriptions are in english */
  456.     roman,            /* use roman language script system */
  457.     
  458.     {    /* array Suites: 1 elements */
  459.     
  460.         /*******************************************************
  461.         [1] -- The part that show we do the required AppleEvents
  462.         *******************************************************/
  463.  
  464.         "Required Suite",
  465.         "Events that every application should support",
  466.         'reqd',
  467.         1,            /* suite level */
  468.         1,            /* suite version */
  469.         
  470.         {
  471.             /* array Events: 0 elements */
  472.         },
  473.         
  474.         {
  475.             /* array Classes: 0 elements */
  476.         },
  477.         
  478.         {
  479.             /* array ComparisonOps: 0 elements */
  480.         },
  481.         
  482.         {
  483.             /* array Enumerations: 0 elements */
  484.         },
  485.     }
  486. };
  487.  
  488. #endif
  489.